(calc-read-parse-table): Let math-expr-opers equal the function

math-standard-ops rather than the variable math-standard-opers.

diff --git a/lisp/calc/calc-prog.el b/lisp/calc/calc-prog.el
index 4dff6f0401392dd7f0f853c5adcde3a39b7aff84..cacad6667727d1e3943384a7a94d4ec2bf0be253 100644 (file)
--- a/lisp/calc/calc-prog.el
+++ b/lisp/calc/calc-prog.el
@@ -568,7 +568,7 @@
                          (set-buffer calc-buf)
                          (let ((calc-user-parse-tables nil)
                                (calc-language nil)
-                               (math-expr-opers math-standard-opers)
+                               (math-expr-opers (math-standard-ops))
                                (calc-hashes-used 0))
                            (math-read-expr
                             (if (string-match ",[ \t]*\\'" str)